home *** CD-ROM | disk | FTP | other *** search
- ;/* CheckBox Example
- sc link checkboxexample.c lib lib:classact.lib
- quit
- */
-
- /**
- ** CheckBoxExample.c -- CheckBox class Example.
- **
- ** This is a simple example testing some of the capabilities of the
- ** CheckBox gadget class.
- **
- ** This code opens a window and then creates 2 CheckBox gadgets which
- ** are subsequently attached to the window's gadget list. One uses
- ** arrows, one does not. Notice that you can tab cycle between them.
- **/
-
- /* system includes
- */
- #include <stdio.h>
- #include <stdlib.h>
- #include <string.h>
-
- #include <exec/types.h>
- #include <exec/memory.h>
- #include <intuition/intuition.h>
- #include <intuition/gadgetclass.h>
- #include <libraries/gadtools.h>
- #include <graphics/gfxbase.h>
- #include <graphics/text.h>
- #include <graphics/gfxmacros.h>
- #include <utility/tagitem.h>
- #include <workbench/startup.h>
- #include <workbench/workbench.h>
-
- #include <proto/intuition.h>
- #include <proto/graphics.h>
- #include <proto/exec.h>
- #include <proto/dos.h>
- #include <proto/utility.h>
- #include <proto/wb.h>
- #include <proto/icon.h>
-
- /* ClassAct includes
- */
- #include <classact.h>
-
-
- enum
- {
- GID_MAIN=0,
- GID_CHECKBOX1,
- GID_CHECKBOX2,
- GID_DOWN,
- GID_UP,
- GID_QUIT,
- GID_LAST
- };
-
- enum
- {
- WID_MAIN=0,
- WID_LAST
- };
-
- enum
- {
- OID_MAIN=0,
- OID_LAST
- };
-
- int main(void)
- {
- struct MsgPort *AppPort;
-
- struct Window *windows[WID_LAST];
-
- struct Gadget *gadgets[GID_LAST];
-
- Object *objects[OID_LAST];
-
- /* make sure our classes opened... */
- if (!ButtonBase || !CheckBoxBase || !WindowBase || !LayoutBase)
- return(30);
- else if ( AppPort = CreateMsgPort() )
- {
- /* Create the window object.
- */
- objects[OID_MAIN] = WindowObject,
- WA_ScreenTitle, "ClassAct Release 2.0",
- WA_Title, "ClassAct CheckBox Example",
- WA_Activate, TRUE,
- WA_DepthGadget, TRUE,
- WA_DragBar, TRUE,
- WA_CloseGadget, TRUE,
- WA_SizeGadget, TRUE,
- WINDOW_IconifyGadget, TRUE,
- WINDOW_IconTitle, "CheckBox",
- WINDOW_AppPort, AppPort,
- WINDOW_Position, WPOS_CENTERMOUSE,
- WINDOW_ParentGroup, gadgets[GID_MAIN] = VGroupObject,
- LAYOUT_SpaceOuter, TRUE,
- LAYOUT_DeferLayout, TRUE,
-
- LAYOUT_AddChild, gadgets[GID_CHECKBOX1] = CheckBoxObject,
- GA_ID, GID_CHECKBOX1,
- GA_RelVerify, TRUE,
- GA_Text, "CheckBox _1",
- CHECKBOX_TextPlace, PLACETEXT_RIGHT,
- CheckBoxEnd,
- CHILD_NominalSize, TRUE,
-
- LAYOUT_AddChild, gadgets[GID_CHECKBOX2] = CheckBoxObject,
- GA_ID, GID_CHECKBOX2,
- GA_RelVerify, TRUE,
- GA_Text, "CheckBox _2",
- CHECKBOX_TextPlace, PLACETEXT_LEFT,
- CheckBoxEnd,
-
- LAYOUT_AddChild, VGroupObject,
- CLASSACT_BackFill, NULL,
- LAYOUT_SpaceOuter, TRUE,
- LAYOUT_VertAlignment, LALIGN_CENTER,
- LAYOUT_HorizAlignment, LALIGN_CENTER,
- LAYOUT_BevelStyle, BVS_FIELD,
-
- LAYOUT_AddImage, LabelObject,
- LABEL_Text, "The checkbox may have its label placed\n",
- LABEL_Text, "either on the left or right side.\n",
- LABEL_Text, " \n",
- LABEL_Text, "You may click the label text as well\n",
- LABEL_Text, "as the check box itself.\n",
- LabelEnd,
- LayoutEnd,
-
- LAYOUT_AddChild, ButtonObject,
- GA_ID, GID_QUIT,
- GA_RelVerify, TRUE,
- GA_Text,"_Quit",
- ButtonEnd,
- CHILD_WeightedHeight, 0,
-
- EndGroup,
- EndWindow;
-
- /* Object creation sucessful?
- */
- if (objects[OID_MAIN])
- {
- /* Open the window.
- */
- if (windows[WID_MAIN] = (struct Window *) CA_OpenWindow(objects[OID_MAIN]))
- {
- ULONG wait, signal, app = (1L << AppPort->mp_SigBit);
- ULONG done = FALSE;
- ULONG result;
- UWORD code;
-
- /* Obtain the window wait signal mask.
- */
- GetAttr(WINDOW_SigMask, objects[OID_MAIN], &signal);
-
- /* Input Event Loop
- */
- while (!done)
- {
- wait = Wait( signal | SIGBREAKF_CTRL_C | app );
-
- if ( wait & SIGBREAKF_CTRL_C )
- {
- done = TRUE;
- }
- else
- {
- while ( (result = CA_HandleInput(objects[OID_MAIN], &code) ) != WMHI_LASTMSG )
- {
- switch (result & WMHI_CLASSMASK)
- {
- case WMHI_CLOSEWINDOW:
- windows[WID_MAIN] = NULL;
- done = TRUE;
- break;
-
- case WMHI_GADGETUP:
- switch (result & WMHI_GADGETMASK)
- {
- case GID_CHECKBOX1:
- /* code is TRUE or FALSE depending on check state */
- break;
-
- case GID_CHECKBOX2:
- /* code is TRUE or FALSE depending on check state */
- break;
-
- case GID_QUIT:
- done = TRUE;
- break;
- }
- break;
-
- case WMHI_ICONIFY:
- CA_Iconify(objects[OID_MAIN]);
- windows[WID_MAIN] = NULL;
- break;
-
- case WMHI_UNICONIFY:
- windows[WID_MAIN] = (struct Window *) CA_OpenWindow(objects[OID_MAIN]);
-
- if (windows[WID_MAIN])
- {
- GetAttr(WINDOW_SigMask, objects[OID_MAIN], &signal);
- }
- else
- {
- done = TRUE; // error re-opening window!
- }
- break;
- }
- }
- }
- }
- }
-
- /* Disposing of the window object will also close the window if it is
- * already opened, and it will dispose of the layout object attached to it.
- */
- DisposeObject(objects[OID_MAIN]);
- }
-
- DeleteMsgPort(AppPort);
- }
-
- return(0);
- }
-